object frmFormasPagamento: TfrmFormasPagamento
  Left = 256
  Top = 120
  BiDiMode = bdRightToLeftNoAlign
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'INFO PLUS Automa'#231#227'o Comercial - Formas de Pagamento'
  ClientHeight = 557
  ClientWidth = 781
  Color = clBlack
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001003030000001000800A80E00001600000028000000300000006000
    00000100080000000000800A0000000000000000000000010000000000000000
    0000800080008000000080800000008000000080800000008000C0C0C000C0DC
    C000F0CAA60080808000FF00FF00FF000000FFFF000000FF000000FFFF000000
    FF00FFFFFF00F0FBFF00A4A0A000D4F0FF00B1E2FF008ED4FF006BC6FF0048B8
    FF0025AAFF0000AAFF000092DC00007AB90000629600004A730000325000D4E3
    FF00B1C7FF008EABFF006B8FFF004873FF002557FF000055FF000049DC00003D
    B900003196000025730000195000D4D4FF00B1B1FF008E8EFF006B6BFF004848
    FF002525FF000000FF000000DC000000B900000096000000730000005000E3D4
    FF00C7B1FF00AB8EFF008F6BFF007348FF005725FF005500FF004900DC003D00
    B900310096002500730019005000F0D4FF00E2B1FF00D48EFF00C66BFF00B848
    FF00AA25FF00AA00FF009200DC007A00B900620096004A00730032005000FFD4
    FF00FFB1FF00FF8EFF00FF6BFF00FF48FF00FF25FF00FF00FF00DC00DC00B900
    B900960096007300730050005000FFD4F000FFB1E200FF8ED400FF6BC600FF48
    B800FF25AA00FF00AA00DC009200B9007A009600620073004A0050003200FFD4
    E300FFB1C700FF8EAB00FF6B8F00FF487300FF255700FF005500DC004900B900
    3D00960031007300250050001900FFD4D400FFB1B100FF8E8E00FF6B6B00FF48
    4800FF252500FF000000DC000000B9000000960000007300000050000000FFE3
    D400FFC7B100FFAB8E00FF8F6B00FF734800FF572500FF550000DC490000B93D
    0000963100007325000050190000FFF0D400FFE2B100FFD48E00FFC66B00FFB8
    4800FFAA2500FFAA0000DC920000B97A000096620000734A000050320000FFFF
    D400FFFFB100FFFF8E00FFFF6B00FFFF4800FFFF2500FFFF0000DCDC0000B9B9
    0000969600007373000050500000F0FFD400E2FFB100D4FF8E00C6FF6B00B8FF
    4800AAFF2500AAFF000092DC00007AB90000629600004A73000032500000E3FF
    D400C7FFB100ABFF8E008FFF6B0073FF480057FF250055FF000049DC00003DB9
    0000319600002573000019500000D4FFD400B1FFB1008EFF8E006BFF6B0048FF
    480025FF250000FF000000DC000000B90000009600000073000000500000D4FF
    E300B1FFC7008EFFAB006BFF8F0048FF730025FF570000FF550000DC490000B9
    3D00009631000073250000501900D4FFF000B1FFE2008EFFD4006BFFC60048FF
    B80025FFAA0000FFAA0000DC920000B97A000096620000734A0000503200D4FF
    FF00B1FFFF008EFFFF006BFFFF0048FFFF0025FFFF0000FFFF0000DCDC0000B9
    B900009696000073730000505000F2F2F200E6E6E600DADADA00CECECE00C2C2
    C200B6B6B600AAAAAA009E9E9E0092929200868686007A7A7A006E6E6E006262
    6200565656004A4A4A003E3E3E0032323200262626001A1A1A000E0E0E00F2F3
    F50AF6F7F7F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8
    F8F8F8F8F8F8F8F8F8F8F8F80000F213F4F50AF6F6F7F7F7F7F7F7F7F7F7F7F7
    F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F8F8F8F8F80000F1F2
    F2F3F3F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F50A0AF6F6F7F7F7
    F7F7F60A0A0AF6F6F7F8F8F8000007F1F1F1F1F2F2F213131313131313131313
    13131313131313F3F4F5F7F8F9FAFAFAFAF9F8F6F4F3F4F50AF7F8F8000007F0
    F0EFEFEFF0F0F0F0F0070707070707070707070707F113F5F7F9FAFB97979797
    9797FAF9F6F4F2F3F5F6F8F80000F0EFEFEEEEEEEDEDEDEDEDEDEDEDEDEDEDED
    EDEDEDEEEFF3F6F9FA969696969696969696969696F613F2F4F6F7F80000EFEF
    EEEDEDECECECECECECECECECECECECECECECED07F4F8F9969595959595959595
    959595959595F513F30AF7F80000EFEFEEEDECEC121111111111111111111111
    ECEE13F7F89595959595959595959595959595959595F7F4F30AF7F80000EFEF
    EEEDECEC1111111111111111111111ECEFF4F7F895959595959594F513F28282
    F28394959595950AF4F5F7F80000EFEFEEEDECEC11111111111111111111EDF1
    0AF7F7F6F6848494838209EEEDEDECECEC80EF13949595F7F4F5F7F80000EFEF
    EEEDECEC111111111111111111EDF2F7F70AF50A0AF6F409EEECEC1111111111
    1111ECED829595950A0AF7F80000EFEFEEEDEC121111111111111111ED13F7F6
    8383F5F58309EDEC111111111111111111111111ED139595F60AF7F80000EFEF
    EEEDEC1211111111111111EDF3F7F513F4F413F1EE1111111111111111111111
    11111111ECEF0A96F60AF7F80000EFEFEEEDEC12111111111111EDF2F6F41313
    138209ED1111111111111111111111111111111111EDF495F60AF7F80000EFEF
    EEEDEC121111111111ED13F61382828209EEEC11111111111111111111111111
    1111111111ED13F7F60AF7F80000EFEFEEEDEC1211111111ECF1F5130909F107
    80EC11111111111111111111111111111111111111ED13F7F60AF7F80000EFEF
    EEEDEC12111111EC07F4F1090909EFEDEC111111111111111111111111111111
    1111111111ED13F70A0AF7F80000EFEFEEEDEC121111ECEFF4F1EEEFF007EEEC
    111111111111111111111111111111111111111111ED13F6F50AF7F80000EFEF
    EEEDEC121112EE13F1ED80EFF2F407EC11111111111111111111111111111111
    1111111111EEF40AF4F5F7F80000EFEFEEEDEC1211EDF2F2EEECED090A9513ED
    111111111111111111111111111111111111111112EFF4F5F3F5F7F80000EFEF
    EEEDEC12EC0713EFEDECEE839595838011111111111111111111111111111111
    11111111ECF0F413F3F5F7F80000EFEFEEEDECECEE13F2EEEDEDEF94959583EE
    1111111111EEF0EFEC11111111ECEFF007EFEC11ECF1F4F213F5F7F80000EFEF
    EEEDECEDF11307EFEEEDEE949595F5EF1111111111F7F80AEE11111111EE0AF8
    F8F7EF11EDF213F113F5F7F80000EFEFEEEDECEF13F2090974ECEDF595959409
    EC111111EE96959409EC111111EFF695959509ECEEF1070713F5F7F80000EFEF
    EEEDEEF2F4F209098011ED1395959409EC1111111396959513ED111111079595
    9594EFECEFEFEF0713F5F7F80000EFEFEEEDEFF413F2F1EFEC11ECF295959582
    EC1111EDF6959595F5EF111111F295959594EEEDEEEEEEF013F5F7F80000EFEF
    EEEEF2F51382F1EE1111EC0995959513ED1111F0F89595959409EC11EC139595
    95F4EDEDEDECEDF013F5F7F80000EFEFEEEF13F5131307EC111111EF95959583
    8011EC13959595959513ED11EC1395959583EDEDECECEDF013F5F7F80000EFEF
    EEF1F5F51382EFEC111111EE949595F4EE11ED0A9595959595F4EE11EDF49595
    95F2ECEC11ECEDF013F5F7F80000EFEFEF130A83F4F1ED11111111EEF4959594
    EF11EFF795959495959409ECEEF4959595F1EC1111ECEDF013F5F7F80000EFEF
    F0F4F6F5F409EC11111111ED1395959409EC139595958383959513EDEFF59595
    9509111111ECEDF013F5F7F80000EFEFF10AF6F513EFEC11111111EDF2959594
    09EEF595959409F1959583EFF00A959595EE111111ECEDF013F5F7F80000EFEF
    F2F6F60A13EE1111111111ECF195959582F1F69595F580EF94959407F1F69595
    94EC111111ECEDF013F5F7F80000EFEF13F7F60AF2ED1111111111EC09949595
    131395959582EC80839595131395959594EC111111ECEDF013F5F7F80000EFEF
    13F8F70AF1EC1111111111ECEF9495950AF6959595EE11ECF195950AF5959595
    8311111111ECEDF013F5F7F80000EFEF1395950AF1EC111111111111EEF49595
    9595959594EC11EC09949595959595958211111111ECEDF013F5F7F80000EFEF
    139595F609EC111111111111ED13959595969595131111118083959595959595
    0911111111ECEDF013F5F7F80000EFEF13959594F1EC111111111111ED139595
    9595959509111111EC82959595959595EE11111111ECEDF013F5F7F80000EFEF
    F1959595F2ED111111111111ECF19595959595F580111111EC09949595959594
    8011111111ECEDF013F5F7F80000EFEF070A9595F4EE111111111111EC079495
    959595F2EC11111111EE839595959594ED11111111ECEDF013F5F7F80000EFEF
    EF13959595F1ED1111111111ECEF949595959509EC11111111ED829495959583
    EC11111111ECEDF0F2F5F7F80000EFEEEEF1949595F507EC1111111112EE1394
    9494F4EEEC11111111EC09F494949482EC11111112ECEDF0F2F4F6F70000EFEE
    EDEE139595950AF1EEECECECECEDEFF1F2F207EDEC12121212ECEDEF090909EE
    ECECECECECECEEEFF2F4F6F70000EEEEEDEDEF83959595F7F5F207F0F0F007F1
    07F0EEEDECECECECECECECEDEDEDEDECECECECECECEDEEEFF1F30AF60000EEED
    EDECEDEF1395959696F9F8F7F60AF4F207EFEEEDEDEDEDEDEDEDEDEDEDEDEDED
    EDEDEDEDEDEDEEEFF1F3F50A0000EDEDEDEDEDEEEFF2F4F69595F8F70A13F1F0
    EFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFF1F2F4F50000EDED
    EDEDEEEEEFEFF007F1F1F1F107F0EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
    EFEFEFEFEFEFEFF0F1F213F30000EDEDEDEEEEEFEFEFEFEFEFEFEFEFEFEFEFEF
    EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F1F1F2F200000000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF0000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF0000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF0000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF0000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF0000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF0000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF0000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF0000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF0000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF0000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF0000
    00000003FFFF000000000003FFFF000000000003FFFF000000000003FFFF}
  KeyPreview = True
  OldCreateOrder = False
  ParentBiDiMode = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object lblCartao: TLabel
    Left = 24
    Top = 312
    Width = 3
    Height = 13
    Visible = False
  end
  object LblTotGeral: TLabel
    Left = 14
    Top = 118
    Width = 133
    Height = 24
    Caption = 'Total Geral R$'
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -21
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object Label1: TLabel
    Left = 14
    Top = 188
    Width = 130
    Height = 24
    Caption = 'Total Pago R$'
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -21
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object lblTroco: TLabel
    Left = 14
    Top = 267
    Width = 84
    Height = 24
    Caption = 'Troco R$'
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -21
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label2: TLabel
    Left = 14
    Top = 50
    Width = 119
    Height = 24
    Caption = 'Sub-Total R$'
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -21
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object Label3: TLabel
    Left = 36
    Top = 459
    Width = 135
    Height = 15
    Caption = 'INFO COMPUTADORES'
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Label4: TLabel
    Left = 43
    Top = 477
    Width = 140
    Height = 15
    Caption = 'Solu'#231#245'es para Automa'#231#227'o'
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Panel6: TPanel
    Left = 232
    Top = 0
    Width = 549
    Height = 530
    Align = alRight
    BevelInner = bvLowered
    BorderStyle = bsSingle
    Color = 13491419
    TabOrder = 0
    object DbgPagamento: TDBGrid
      Left = 2
      Top = 301
      Width = 541
      Height = 223
      Hint = 'Formas de Pagamento informadas.'
      TabStop = False
      Align = alBottom
      Color = clWhite
      Ctl3D = False
      DataSource = DMCaixas.DsFormas
      FixedColor = 13491419
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = 'Times New Roman'
      Font.Style = [fsBold]
      Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect]
      ParentCtl3D = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 5
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnMouseMove = Hints
      Columns = <
        item
          Expanded = False
          FieldName = 'CODIGOCARTAO'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Times New Roman'
          Font.Style = []
          Title.Caption = 'Seq.'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = 'Verdana'
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DESCFORMAPAG'
          Title.Caption = 'Forma de Pagamento'
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -13
          Title.Font.Name = 'Verdana'
          Title.Font.Style = [fsBold]
          Width = 286
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VALORFORMA'
          Title.Caption = 'Valor R$'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'VALOR'
          Title.Caption = 'Valor Pago R$'
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -13
          Title.Font.Name = 'Verdana'
          Title.Font.Style = [fsBold]
          Width = 175
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VINCULADO'
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Times New Roman'
          Font.Style = []
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'DOCUMENTO'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'DATASAIDA'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'CODLOJA'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'CLICHE'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'CODFORMAPAG'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'CODTIPOPAG'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'DESCTIPOPAG'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'TIPOREGISTRO'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'TIPOREGISTRO'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'NRCONTROLE'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'IMPRESSO'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'ATUALIZADO'
          Visible = False
        end>
    end
    object PnlFormasPagto: TPanel
      Left = 2
      Top = 158
      Width = 541
      Height = 143
      Align = alBottom
      Color = 13491419
      TabOrder = 4
      object LblPagamento: TLabel
        Left = 11
        Top = 6
        Width = 138
        Height = 17
        Caption = 'Forma de Pagamento'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object LblValorPag: TLabel
        Left = 13
        Top = 56
        Width = 58
        Height = 17
        Caption = 'Valor R$'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object LblDescontoForma: TLabel
        Left = 154
        Top = 56
        Width = 81
        Height = 17
        Caption = 'Desconto %'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object LblValorComDesc: TLabel
        Left = 249
        Top = 56
        Width = 110
        Height = 17
        Caption = 'Valor c/ Desc.R$'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object LblValorPago: TLabel
        Left = 382
        Top = 56
        Width = 93
        Height = 17
        Caption = 'Valor pago R$'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object CBFormaPag: TComboBox
        Left = 12
        Top = 22
        Width = 493
        Height = 29
        Style = csDropDownList
        CharCase = ecUpperCase
        DropDownCount = 10
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'Times New Roman'
        Font.Style = []
        ItemHeight = 21
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnEnter = CBFormaPagEnter
        OnExit = CBFormaPagExit
        OnKeyPress = CBFormaPagKeyPress
      end
      object dbValor: TEdit
        Left = 14
        Top = 72
        Width = 131
        Height = 29
        Hint = 'Informar o valor para pagamento'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnExit = dbValorExit
        OnKeyPress = ValidarNumerico
        OnMouseMove = Hints
      end
      object EdtDescontoForma: TEdit
        Left = 155
        Top = 72
        Width = 82
        Height = 29
        Hint = 'Informar o valor para pagamento'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        Visible = False
        OnExit = EdtDescontoFormaExit
        OnKeyPress = ValidarNumerico
        OnMouseMove = Hints
      end
      object btConfirmar: TBitBtn
        Left = 112
        Top = 107
        Width = 153
        Height = 31
        Hint = 'Confirmar Pagamento'
        Caption = '&Finalizar'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 5
        OnClick = btConfirmarClick
        OnMouseMove = Hints
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333330000333333333333333333333333F33333333333
          00003333344333333333333333388F3333333333000033334224333333333333
          338338F3333333330000333422224333333333333833338F3333333300003342
          222224333333333383333338F3333333000034222A22224333333338F338F333
          8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
          33333338F83338F338F33333000033A33333A222433333338333338F338F3333
          0000333333333A222433333333333338F338F33300003333333333A222433333
          333333338F338F33000033333333333A222433333333333338F338F300003333
          33333333A222433333333333338F338F00003333333333333A22433333333333
          3338F38F000033333333333333A223333333333333338F830000333333333333
          333A333333333333333338330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
      end
      object bitCancelar: TBitBtn
        Left = 265
        Top = 107
        Width = 153
        Height = 31
        Hint = 'Cancelar forma(s) de pagamento'
        Cancel = True
        Caption = '&Cancelar'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 6
        OnClick = bitCancelarClick
        OnMouseMove = Hints
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333333333333333333333000033338833333333333333333F333333333333
          0000333911833333983333333388F333333F3333000033391118333911833333
          38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
          911118111118333338F3338F833338F3000033333911111111833333338F3338
          3333F8330000333333911111183333333338F333333F83330000333333311111
          8333333333338F3333383333000033333339111183333333333338F333833333
          00003333339111118333333333333833338F3333000033333911181118333333
          33338333338F333300003333911183911183333333383338F338F33300003333
          9118333911183333338F33838F338F33000033333913333391113333338FF833
          38F338F300003333333333333919333333388333338FFF830000333333333333
          3333333333333333333888330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
      end
      object EdtValorFinal: TEdit
        Left = 250
        Top = 72
        Width = 122
        Height = 29
        Hint = 'Informar o valor para pagamento'
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        Visible = False
        OnKeyPress = ValidarNumerico
        OnMouseMove = Hints
      end
      object EdtValorPago: TEdit
        Left = 383
        Top = 72
        Width = 122
        Height = 29
        Hint = 'Informar o valor para pagamento'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        Visible = False
        OnExit = EdtValorPagoExit
        OnKeyPress = ValidarNumerico
        OnMouseMove = Hints
      end
    end
    object PnlCliente: TPanel
      Left = 2
      Top = 51
      Width = 541
      Height = 51
      Align = alTop
      Color = 13491419
      TabOrder = 1
      object Label5: TLabel
        Left = 5
        Top = 1
        Width = 79
        Height = 17
        Caption = 'Cod.Cliente'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label6: TLabel
        Left = 181
        Top = 1
        Width = 39
        Height = 17
        Caption = 'Nome'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object EdtCodCliente: TEdit
        Left = 5
        Top = 16
        Width = 145
        Height = 29
        Hint = 'C'#243'digo do cliente / C para cadastrar'
        CharCase = ecUpperCase
        Ctl3D = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnExit = EdtCodClienteExit
      end
      object BtnConsCliente: TButton
        Left = 150
        Top = 16
        Width = 34
        Height = 28
        Caption = '...'
        TabOrder = 1
        TabStop = False
        OnClick = BtnConsClienteClick
      end
      object StNomCliente: TStaticText
        Left = 184
        Top = 16
        Width = 353
        Height = 29
        AutoSize = False
        BevelKind = bkTile
        Color = clWhite
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
      end
    end
    object PnlVendedor: TPanel
      Left = 2
      Top = 2
      Width = 541
      Height = 49
      Align = alTop
      Color = 13491419
      TabOrder = 0
      object LblVendedor: TLabel
        Left = 5
        Top = 1
        Width = 64
        Height = 17
        Caption = 'Vendedor'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object CBVendedor: TComboBox
        Left = 5
        Top = 16
        Width = 392
        Height = 29
        Hint = 'Vendedor responsavel pela venda'
        Style = csDropDownList
        DropDownCount = 10
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'Times New Roman'
        Font.Style = []
        ItemHeight = 21
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        Visible = False
        OnChange = CBVendedorChange
      end
    end
    object PnlDescontos: TPanel
      Left = 2
      Top = 102
      Width = 256
      Height = 56
      Align = alLeft
      Color = 13491419
      TabOrder = 2
      Visible = False
      object LblTotDesc: TLabel
        Left = 109
        Top = 3
        Width = 123
        Height = 17
        Caption = 'Total Desconto R$'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object LblPerDesc: TLabel
        Left = 5
        Top = 3
        Width = 81
        Height = 17
        Caption = 'Desconto %'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object EdtTotDesc: TEdit
        Left = 109
        Top = 19
        Width = 127
        Height = 32
        Hint = 'Valor do desconto'
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        Visible = False
        OnExit = EdtTotDescExit
        OnKeyPress = ValidarNumerico
        OnMouseMove = Hints
      end
      object EdtPerDesc: TEdit
        Left = 5
        Top = 19
        Width = 93
        Height = 32
        Hint = 'Percentual de desconto'
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        Visible = False
        OnExit = EdtPerDescExit
        OnKeyPress = ValidarNumerico
        OnMouseMove = Hints
      end
    end
    object PnlAcrescimos: TPanel
      Left = 273
      Top = 102
      Width = 270
      Height = 56
      Align = alRight
      Color = 13491419
      TabOrder = 3
      Visible = False
      object LblTotAcre: TLabel
        Left = 6
        Top = 3
        Width = 131
        Height = 17
        Caption = 'Total Acr'#233'scimo R$'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object LblPerAcre: TLabel
        Left = 146
        Top = 3
        Width = 89
        Height = 17
        Caption = 'Acr'#233'scimo %'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object EdtTotAcre: TEdit
        Left = 8
        Top = 19
        Width = 127
        Height = 32
        Hint = 'Valor do desconto'
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        Visible = False
        OnExit = EdtTotAcreExit
        OnKeyPress = ValidarNumerico
        OnMouseMove = Hints
      end
      object EdtPerAcre: TEdit
        Left = 146
        Top = 19
        Width = 91
        Height = 32
        Hint = 'Percentual de desconto'
        TabStop = False
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        Visible = False
        OnExit = EdtPerAcreExit
        OnKeyPress = ValidarNumerico
        OnMouseMove = Hints
      end
    end
  end
  object PSubTotal: TPanel
    Left = 16
    Top = 72
    Width = 209
    Height = 36
    Alignment = taRightJustify
    BorderStyle = bsSingle
    Caption = '0,00'
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clYellow
    Font.Height = -33
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
  end
  object Panel4: TPanel
    Left = 0
    Top = 530
    Width = 781
    Height = 27
    Align = alBottom
    BorderStyle = bsSingle
    Color = clActiveBorder
    TabOrder = 1
    object lblAjuda: TLabel
      Left = 11
      Top = 2
      Width = 6
      Height = 13
      Caption = '  '
      Color = clActiveBorder
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
  end
  object PanTotGeral: TPanel
    Left = 14
    Top = 139
    Width = 209
    Height = 36
    Alignment = taRightJustify
    BorderStyle = bsSingle
    Caption = '0,00'
    Color = clBlack
    Ctl3D = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clLime
    Font.Height = -33
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 4
    OnExit = PanTotGeralExit
  end
  object LblTotPago: TPanel
    Left = 14
    Top = 210
    Width = 209
    Height = 36
    Alignment = taRightJustify
    BorderStyle = bsSingle
    Caption = '0,00'
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -33
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 5
  end
  object PTroco: TPanel
    Left = 14
    Top = 288
    Width = 209
    Height = 36
    Alignment = taRightJustify
    BorderStyle = bsSingle
    Caption = '0,00'
    Color = clBlack
    Ctl3D = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clAqua
    Font.Height = -33
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 6
  end
  object Panel3: TPanel
    Left = 93
    Top = 326
    Width = 595
    Height = 81
    BevelInner = bvLowered
    BevelWidth = 2
    BorderWidth = 2
    BorderStyle = bsSingle
    Color = 13491419
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    Visible = False
    object StaticText1: TStaticText
      Left = 6
      Top = 48
      Width = 579
      Height = 23
      Align = alBottom
      Alignment = taCenter
      Caption = 'Encerrando Cupom Fiscal. Aguarde !!!'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = 'Times New Roman'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
    end
  end
  object StaticText6: TStaticText
    Left = 50
    Top = 494
    Width = 141
    Height = 18
    AutoSize = False
    Caption = 'Fone: (79) 9924-3555'
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    TabOrder = 7
  end
  object RvPedido: TRvProject
    Engine = RvS_Relatorios
    ProjectFile = 'Relatorios\Pedido.rav'
    OnAfterOpen = RvPedidoAfterOpen
    Left = 96
    Top = 288
  end
  object rdsDocumento: TRvDataSetConnection
    RuntimeVisibility = rtDeveloper
    DataSet = SQLC_Imprimir_Pedido
    Left = 288
    Top = 128
  end
  object rdsProdutos: TRvDataSetConnection
    RuntimeVisibility = rtDeveloper
    DataSet = SQLC_Imprimir_Produtos
    Left = 288
    Top = 176
  end
  object SQLC_Imprimir_Pedido: TSQLClientDataSet
    CommandText = 
      'SELECT CAST(SAD_DOCUME AS INTEGER) AS BAD_IDFDOCUMENTO, SAD_DATA' +
      'VE AS BAD_DATAVE, SAD_CODVEN AS BAD_CODVEN, USU.USU_NOME, EM.EMP' +
      '_RAZSOC,'#13#10#9'EM.EMP_FANTAS, SAD_CODCLI AS BAD_IDFPESSOA, EM.EMP_CO' +
      'DPOS, CI.CID_DESCRI, EM.EMP_ESTCOD, EM.EMP_ENDERE,'#13#10#9'EM.EMP_BAIR' +
      'RO, EM.EMP_FONE, EM.EMP_FAX, EM.EMP_CNPJ, EM.EMP_INSEST, '#39#39' AS B' +
      'AD_OBSERVA,'#13#10#9'PES.PES_IDFCOD, PES.PES_NOME, PES.PES_FANTASIA, PE' +
      'S.PES_ENDERECO, PES.PES_BAIRRO,'#13#10#9'PES.PES_POSTAL, CID.CID_DESCRI' +
      ', CID.CID_ESTCOD, CID.CID_ESTCOD, PES.PES_FONE, PES.PES_CPFCNPJ,' +
      #13#10'    PES.PES_IDEINS'#13#10'FROM SAIDA_DOCUMENTO SD'#13#10'INNER JOIN USUARI' +
      'OS USU ON USU.USU_CODIGO = SD.SAD_CODVEN'#13#10'INNER JOIN EMPRESAS EM' +
      ' ON SD.SAD_IDFEMPRESA = EM.EMP_CODIGO'#13#10'INNER JOIN CIDADES CI ON ' +
      'CI.CID_CODIGO = EM.EMP_CIDCOD AND CI.CID_ESTCOD = EM.EMP_ESTCOD'#13 +
      #10'INNER JOIN PESSOAS PES on PES.PES_IDFCOD = SD.SAD_CODCLI'#13#10'INNER' +
      ' JOIN CIDADES CID ON CID.CID_CODIGO = PES.PES_CIDADE AND CID.CID' +
      '_ESTCOD = PES.PES_ESTADO'#13#10'WHERE SD.SAD_IDFDOC = :DOCUMENTO'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftUnknown
        Name = 'DOCUMENTO'
        ParamType = ptInput
      end>
    DBConnection = DMCaixas.ConnectionGestor
    Left = 104
    Top = 128
  end
  object SQLC_Imprimir_Produtos: TSQLClientDataSet
    CommandText = 
      'SELECT CAST(SAD_DOCUME AS INTEGER) AS BAI_IDFDOC, EP.ESP_CODIGO,' +
      ' SAI_QUANTI AS BAI_QUANTI,'#13#10'EP.ESP_DESCRI, EP.UNI_CODIGO ,'#13#10'SAI_' +
      'PREVEN AS BAI_PREVEN, SAI_PRETAB AS BAI_PRETAB, (SAI_PREVEN * SA' +
      'I_QUANTI) AS TOTAL'#13#10'FROM SAIDA_ITEM SI'#13#10'INNER JOIN ESTOQUE_PRODU' +
      'TO EP ON EP.ESP_IDFCOD = SAI_IDFITEM'#13#10'INNER JOIN SAIDA_DOCUMENTO' +
      ' ON SAD_IDFDOC=SAI_IDFDOC'#13#10'WHERE SAI_IDFDOC = :DOCUMENTO'#13#10
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftInteger
        Name = 'DOCUMENTO'
        ParamType = ptInput
      end>
    DBConnection = DMCaixas.ConnectionGestor
    Left = 106
    Top = 184
    object SQLC_Imprimir_ProdutosBAI_IDFDOC: TIntegerField
      FieldName = 'BAI_IDFDOC'
      Required = True
    end
    object SQLC_Imprimir_ProdutosESP_CODIGO: TStringField
      FieldName = 'ESP_CODIGO'
      Required = True
      Size = 13
    end
    object SQLC_Imprimir_ProdutosBAI_QUANTI: TFMTBCDField
      FieldName = 'BAI_QUANTI'
      Required = True
      Precision = 15
      Size = 3
    end
    object SQLC_Imprimir_ProdutosESP_DESCRI: TStringField
      FieldName = 'ESP_DESCRI'
      Required = True
      Size = 40
    end
    object SQLC_Imprimir_ProdutosUNI_CODIGO: TStringField
      FieldName = 'UNI_CODIGO'
      Size = 3
    end
    object SQLC_Imprimir_ProdutosBAI_PREVEN: TFMTBCDField
      FieldName = 'BAI_PREVEN'
      Required = True
      Precision = 15
      Size = 3
    end
    object SQLC_Imprimir_ProdutosBAI_PRETAB: TFMTBCDField
      FieldName = 'BAI_PRETAB'
      Required = True
      Precision = 15
      Size = 3
    end
    object SQLC_Imprimir_ProdutosTOTAL: TFMTBCDField
      FieldName = 'TOTAL'
      Required = True
      Precision = 15
      Size = 6
    end
  end
  object RvS_Relatorios: TRvSystem
    TitleSetup = 'Op'#231#245'es de Impress'#227'o'
    TitleStatus = 'Progresso do Relat'#243'rio'
    TitlePreview = 'INFO PLUS - Visualiza'#231#227'o da Impress'#227'o'
    SystemSetups = [ssAllowCopies, ssAllowCollate, ssAllowDuplex, ssAllowDestPreview, ssAllowDestPrinter, ssAllowDestFile, ssAllowPrinterSetup, ssAllowPreviewSetup]
    SystemFiler.StatusFormat = 'Gerando P'#225'gina %p'
    SystemFiler.StreamMode = smTempFile
    SystemPreview.FormState = wsMaximized
    SystemPreview.MarginMethod = mmScaled
    SystemPreview.MarginPercent = 5.000000000000000000
    SystemPreview.ZoomFactor = 115.000000000000000000
    SystemPrinter.ScaleX = 100.000000000000000000
    SystemPrinter.ScaleY = 100.000000000000000000
    SystemPrinter.StatusFormat = 'Imprimindo p'#225'gina %p'
    SystemPrinter.Title = 'Marksystte'
    SystemPrinter.UnitsFactor = 1.000000000000000000
    Left = 194
    Top = 280
  end
  object SQLC_Imprimir_Pagto: TSQLClientDataSet
    CommandText = 
      'SELECT SAF_VALOR AS BAF_VALOR, SAF_CODFORMA AS BAF_CODFORMA, FPG' +
      '_NOME'#13#10'FROM SAIDA_FORMA'#13#10'INNER JOIN FORMASPAGAMENTO ON FPG_CODIG' +
      'O=SAF_CODFORMA'#13#10'WHERE SAF_IDFDOC=:DOCUMENTO'#13#10'ORDER BY SAF_CODFOR' +
      'MA'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftUnknown
        Name = 'DOCUMENTO'
        ParamType = ptInput
      end>
    DBConnection = DMCaixas.ConnectionGestor
    Left = 104
    Top = 232
  end
  object rdsPagto: TRvDataSetConnection
    RuntimeVisibility = rtDeveloper
    DataSet = SQLC_Imprimir_Pagto
    Left = 296
    Top = 232
  end
end
